 |
   
| ru |
 |
12-08-08 @ 23:12
Total Error  
АВТООБКАСТ МАКСИМАЛЬНЫЕ КАСТЫ В ЛЮБОЕ ВРЕМЯ СУТOK
|
Если вам автоответчик пишет "не найден набор кастов" - переводите кр. согласно ценам в инфе, или пытайтесь кастовать по отдельности.
Для получения скидки после 5 кастов напишите мне => (м)+Сделал у вас 5 кастов прошу добавить в скидки
[цена]: цены для начинающих
[скидки]: попадаете сюда после 5 кастов
[vip]: попадаете сюда после 50 кастов
[гос]: сюда попадают клиенты кастующиеся за ЕКРы (подробнее в привате)
__Касты:______________цена скид VIP гос
Жажда_Жизни+5(2часа) |7.5__|7.0_|6.50|6.20|
Сокрушение(+25)_____ |5.0__|4.5_|4.20|3.90|
Хол Разум (+10)_____ |4.99_|4.60|4.10|2.20|
ЖЖ5+Сокрушение______ |12.5_|11.5|10.7|10.1|
Защ.от_Огня(+100)___ |3.31_|3.01|2.91|2.51|
Защ.от_Воды(+100)___ |3.32_|3.02|2.92|2.52|
Защ.от_Возд.(+100)__ |3.33_|3.03|2.93|2.53|
Защ.от_Земли(+100)__ |3.34_|3.04|2.94|2.54|
Огн.усиление(+25)___ |3.35_|3.05|2.95|2.55|
Вод.усиление(+25)___ |3.36_|3.06|2.96|2.56|
Возд.усиление(+25)__ |3.37_|3.07|2.97|2.57|
Земн.усиление(+25)__ |3.38_|3.08|2.98|2.58|
Сокр.+Огн.усил______ |8.35_|7.55|7.15|6.40|
Стихийная_защита____ |13.30|12.1|11.7|10.1|
Неполная_стих_защита |9.96_|9.06|8.76|7.56| (отОгВодВозд)
Услуга авансовый платеж:
Для пополнения счёта - просто переведите сумму не совпадающую с ценами на касты.
для заказа кастов через авансовый платёж написать в приват: заказ: и название каста(ов)
Пример:
[ххх] private [Total Error] заказ: жж5 сокр
Пишем в приват:
recast - если не кастанулось.
статистика - статистика кастов
баланс - остаток Авансового платежа
|
Total disscussion threads: 3 Pages: 1
«« « 1 » »»
Post reply | Post reply with quote
 |
|
Програма зчитує двоцифрове число і виводить через пробіл кожну цифру окремо.
Технічні умови. Число натуральне на проміжку від 10 до 99 включно.
program cifra;
var n, a, b: integer;
f, s: text;
begin
assign (f, 'input.txt')
reset(f);
readln(n);
a:=n div 10
b:=n mod 10
writeln (a, '',b);
assign (s 'output.txt');
rewrite(s);
close(s);
end.
|
 |
|
|
 |
|
// Ошибки слишком элементарные. В этой задаче даже подвоха нет
var
n, a, b: integer;
f, s: text;
begin
assign (f, 'input.txt');
reset(f);
readln(f, n);
close(f);
a:=n div 10;
b:=n mod 10;
assign (s, 'output.txt');
rewrite(s);
writeln (s, a,' ',b);
close(s);
end. |
|
|
|
|
|
|
Приклад введення
23
Приклад виведення
2 3 |
|
|
|
|
Post reply | Post reply with quote
Total disscussion threads: 3 Pages: 1
«« « 1 » »»
|
 |
